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Hi there, gamesters, it's time for another bumper 
Book of Games just in time to stop you getting 
bored during the summer holidays. 

ing and entertaining selection of programs sent far between — but if you have any proble 

in by our readers. don't hesitate to call C&VGs Bug Hunter 

Besides being fun to play, they'll hopetully will try and solve your problems. 

help you improve your programming skills. And if these listings have inspired you tc 

All the games have been tried and tested by your hand at coming up with a game of your c 

our team of reviewers. Bugs should be few and we may be able to publish it. 
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Evaluator's comments 

Good enough | 1 

to publish 

Needs some i 1 

tidying up 

Not worth 1 1 

publishing 

Same game i 1 

already published 

Wouldn't load 


Acknowledgement sent: 
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author for alterations: | sent: 
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issue of magazine. 
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The deep space 
shuttle mission 
started out peace- 
fully enough — but 
then trouble. Your 
fuel tanks are 
empty. 

Youronly hope is 
to crash land on a 
nearby planet and 
collect fuel in the 
hope of being able 
to resume your 
mission. 

But beware the 
flying saucers and 
deadly laser which 
could mean total 
destruction. 

Full instructions 
for Spectranaut are 
included in the 
program. 







2 ■ S3 ■ S3, 127, =-55, 255.. 254 . 2= 


■'"' ! "::■■.. 


3 ■ PEN 


1 PRINT" a d 


RBHftUT 

PIH7" 




efPECT 
-■■ PAPER I. PEN 3-F 
BV NIBBLESOFT 


-ii.i PhPEF 


Li FEt 


2 PRINT"FIS YOU WERE FLYIN 

. iN YOlJPSPHLfc. SHUTT! F V*! 
-L AN[> HFC' rO CRfl 

HMET. YOU HON HfiVfc TO K 
JTTLE Tij rflf.t OFF ftfiFEl 




"OiTicToon ror ucu 
.1 n ui i\i iu LrL 10 i 



5,5,2-EW £.15 



[=4Ci0£ii} TO -iijtitj RJiRD I 



.' 46191-RERD fi:pi:i 

1,0,0,0,0,0,0,0,61 
!49 . 120,0, 8,ee, iei 




Ln ll h\ni mui 



ul'iQToon ror ucu 
i n ui i\iiu «_/«_ id i 



1.4. tit. I . I > 1 



'■ 




PPI ! PPPHbYAIDEN TAYLOR 

l\LU I l\LU 



.DrtL i (\di i to/ turtl 




„,..«,„*«* « « ^ 

—75 LET K-a- „ ST EP Z , 

3' PB " „«, no 

K> „_,. LET K=«* u 
UO LET V-V 

,5 PRINT CT 1».« 

loo p«« t ;" ".!ii>.« u ;r,.iT 

! ** , „„ OB *«» (»• 
X02 & » ,T " 'to 20" ,„ 2: A 

T V-l-* 1 £-,,',. GO TO 115 ^...q",* 

'v-* -1 t U" INK 2: AT y i)');"a" 
""""WO '»«" ^'S'-«» 

% Si. if/—--'' » l 



° »° !3o """-.fu,"**'" S?.™"* 




'► 



f\Cu riKn i B1MUt » < AYLU " 



J 



"5 IF ATTR {y „ , . „ 

I »K c;at /i , .'' ™N PR! 

'■»-i>"EJ2»,at » i' SSS'i" »• 

*"-i.™ i ?i...r ""• 

x=x*2: LET y^ + p. , Z J THEN LET 
* 2 = LET y~u- 2 . , £, THEN LET x= x 

-"«" "™r-,""" T "» L.T*.„ 

170 OO TO 100 " - 1 
200 IE ATTR - 
| TO 6O0 '"-l.x).3 THEN g 
f 05 REM YOUR 
2" PAUSE 10: »„„ ' 
"' D: »EEP .J,,. „;„■*■»■ BEEP 

T ™ Cv.'n-f 1 "!" "•"""Sti-I Ink < 
230 LET „ ' , ZL h < "CM" 

3 IF ATTR <„ " '"' > 
T INK 7:AT y _* . f T 7 ,I THE « PRI1 

240 " "■=' then* : go "to T 



" 7ID LIT u-17: let .-III" <RN0»8 
)«i).l: LET »-lH LET *" 15i LET 
c ^i. LET h = 15s LET v^3 
260 GO TO 100 

3O0 REM »«*="*" „ „ ; .. B ONU S 
305 PRINT INK 5 ; AT o.", 
."■b- LET z=USR 30025 
'jio'FOR f-1 TO » STEP 10: LET . 
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>716^T07679:POKE I ■ PEEKII *' !, 



l READA: IFA-999THEN1SO 

a POKE I. A. I- * - iai.161.13"' 

DATA63.67. 253. !■"■ J - < "-- 

.* eA 108. 108. 10B. 56 



.-TAZ55. 253. 251-255. 7 
13 „. 138, 138. 128, 128.255 
3 DATA167. 167. 167.167.1 



.32. 



j DATAO, 0, 0,76. 210. H*. o ■ 
6 229 1U9.1U9.226 

iTUBWHTHKIGHTURIGHTHKIGHT] [RIOH' 

;«o"pRI>i-[I.VSOT] IRI0RT1 ["«R1 \° ,' 
„ .HRIOHT] [RIGHT] [RIGHT] l"" [ = 
I RIGHT] " IRVSOFF] [.F-P] 1RVS 

3 „ [«..! , ""J,, [RIGHT] [RIGHT] " 
1 '""".L.U.Uo,* ™»GO.« 1« »1 I""""" I- 

",, ,:ui [» ■''■••»u.H ! ...»Tn».G.Ti 

,so>] IR vs0 " U "*";w«°si»] [RVSoffHM 

1 ^;rso.!"..G.T!';.*G»™«"»""= •"" 

I IGRT! [RIGRT1 i;™™; F H*Unl [«IG»T] [«> 

,'i.vsoR] inraoFrl [.--"■ 



I? ' FORI -lTO5ao0: NEXT 

^f R f NT "" iIQHT] tRIQHT] [RIGHT, r» 
I JN] (RIGHT 1 fBTOHT, , 1KXG "T] [R. .._ J 

[RVsonj [right " pi (,,SWi,||c "Haip] 

IGHTj [RIGHT] , RIGHT R "^I»VSCN) [ HIMT] (R 
HT] [RIGHT] [RIGHT] ",Vu < RIa "T] [RIG 

(RIGHT] [RI QHTJ[R IS ' C - 'I : PRINT" [RVSON] 

GHTJ [RIGHT] [right^ s" aHTJ flOHTJ [R ' 

>FFJ[ C *][RIGHTl7 ". [RIS »T] [RIGHT] [R 
TJ [RIGHT] tiwn"^; t!"™) to •] f„fli 

w - s^Kasffisss ir-" ,r ^ i- 

"Ia«T] [RIGHT] [BIGHTffrr 1 ' RIG « T 1 ■ [RIGHT] [ 

«) [RIGHT] [RIQHT] [RIGHT?"!, fRIaHTJ [RVSO 
[RIOHT][Ri a „T,r R ; Q i_^' I T][RVSOFF]. [H (,] . 
T] [RVSON] » tRIQ '' T, "I0HTI [RIGHT] [rjgh | 

^IGHtT^RIGHt?^' rR1G8T] [«^ON] [RK. 

- ""I [RIGHT] [RVSON] 



1 [RIGHT] [R 
HT] [RVSON] 

[RVSOFF] [c ,, | 
EP J [<> -UrjghtHb 



N(« •][. 



p Ho *][Rm 



, '"=™". T ;'S"? H ,L r ™Tr;." ,so " <• 
I »",;;•"; »-i >™..Ti" , ?ri,.;™~""l 

RVSOFF) [ S EP] [right .w"° "HRVSONj [ 

» *- IFAI = ""THEN310 ' 

' CL "" II """«l""OK««a.I:, «[ 



b- 



DIMA(j u ,_, 

C-XTOSil _ 




PRINT"[BLACK} [DOWN] [DOWN] [DOWN] I 
— 1 IRIGHTJ [RIGHTJ [RIGHT] [RIGHT R 
-NY KEY": POKE! 96, □ 
30 QSTAS:I FAt ..... THEN2a30 

i [down] wowi SxiiSrnuiSHiiSSM [i 

or™ PHINT " [DOWNJSCORE ■"»*«» I 

3030 PHINT-tDOWNJSCORE^RiaHTHRTrHTl r DT 
M [MOHT1 [RIGHT] [RIGHT] f RIGHT] [RIGHT ]" 



NUS[RIGHT]"SC 

RORI=.1 T 030; POKES^ 
NEXT:NEXT:P0KES2.0 






l-in~ii±mi nn~ bym.offield 



> ONERROH MODES:] 



•10 proctitlepaqe' 



iao proctable' ' ' ' 

200 PROCBYE 

230 ! 

2 7-127,'63.63 1, ; S n e ' 96,168 ' a ° 8 ^3. 
2C8.2 211 ,^° „ . 7 - - -23.227.2oa.l6 
1 BALL) 



» „ ..-iin*! -»0 "MOVE YOUR LJ 
„10 PRINTTABI3.10)CHR*1-5U 

I GHT SABRE USING THE " ^"FOLLOWING \ 
' 20 PBINTTABIH. 12>CHRU ju 



.96 I 

| -^i8:cHM«"!^^-^ R ""-™«»10.CHR t3 l 
■ 280 VDU23 22B o n in 

J - 6 - 15. 7. 6. 7. 15. 6 3 1; "|'f a - ^'56.23.230 | 



290 






■233.: 



,255 



■23.236 



6 3.23.235. 



JUO DIMFIQHT*[3) HSN»(<>1 

I "€~~™ ~"*', 

LB " f <*e*CHR»8»CHR«2a9.cHRI^ Hft * 230 * CHR * 10 * C I 

I B «e'cH R F t T™ 3) - CHRt32 *^^3 -c f 

H -,,„ * fl CHB *236-CHR*23l 

■ <Iv"!,r >RI, '* :1T05 ' 1,SN *< I *>-"Th e B, 



360 



» PROCTIT LEPAGE 
^"- OT 02U:PRI NTTAB( , 



520 PRINTTABI 
530 GX-GET 



630 *FX15,1 _ 20 0:DRAW6UO.- 

6H0 GCOL0.1:MO VE " (> ' 1 "' ,; 6il0 _. 10o 
i PLOT85. -6"0. -IO^PL.0 ^ ^^^ 5o:NOS 

650 MOVE 3"0. J-u _ 10 o ! PLOTS5.-610. 1 



iCl/lJI IQI I'CObym nFFiFin 















1°30 DEF PROCSABRE 
1040 GCOLII . 0:MOVE0. 


•DRAW 


<P*25al, (COS 


1060 IF F\I p'pq' 1 


IF P< 


-PI/2 P-P+0.1 


070 PROCMOVIBALL 
OSO GCOLU.OJMOVE 0. 


:DRA W 


<P*250) (COS 


090 ENDPRoc 






110 DEF PROCMOVEBAL 







L130 acoi.o,2. MOVE XBS 



. HITSABREX I 



i>HOCCOVERSHOT 
i IF HITSABREX THEN PROCHITSABRE E 
DEADX THEN FRQCDEAD 



■ PROCCOVERSHOT 



XB\<- 5 ao) OR (DRxf3*AND°Y ° R ' DB ' 
DPROC < 50> TI,EN "OVINGX^FALf 

l4™f , ^B' ( S s ^"" ; ^ 0!IF xb 
! t ar™F™ vi ""™*" s *"""«o" ! " xa * <XB ' 

I 21 THEN MOVlNQK-vn Ji B% ' VBX ~ 20: 1F ^B^Ys! 
12^10 o^, I K " FALSE:E "t | PROC 

L2!10 ENOPROC ' ;FRINT BALL! 



J.680. IF W-0 THEN XLS = 0:t 



F XlSaO M"0: GOTOino 
M-Y1X/XIX 



pliL 



[NKEV(-67) V Fi ! 9 n > I ,r*" 1;PBOCSABRE ELSE I 
ILL P *-°- PROCSABRE ELSE PROCMO I 



HITlX-poiN- 
->:HIT3Jf=POINl 
IU60 GCOLO, 1 



"oor 
.uuu 



2650 PHOCCOKQBATS 
2660 PRINTTAB<S,16 



!HSK[l*-l> iHS '" 



> NEXTL0OPN 



r PROCBYE 



>RINTTAB(10.1 



PRINTTrtBf lil ei^uD... .. 

1 NEXT ™ IW1 



..,_j6iLBVX 

30(10 BESTORE3090 



CHRS132"THE HIGHEST i 
.Il)CHB*131"ON LEVEL"C: 



totcooh I 

U IICKIILL 



UU BY STEVEN HOWARD 
I ll\ 



:/ HB3L AFTER 



), 24, 213. 36, 2 

,,,6,24,126.223,191.1 

SbSC" 242,66, 126,255,2=5,24, 

;Ynl0L 243,0,8,3,15,63.127.25 

■VHBOL 244,8,9.3.3,224,213.2'' 

;?HB0L_247, 123. 112,248.252.2 
BhB3L 7 248.133.281. 113.43.11 
SYMBOL 243.8,24,44.34,94,131 
SYMBOL 258, 8. 255.126, 63, 7. 3. 

li MODE 

1 ™W,. S -.188 

iUND 1,388,18,7,8,8,1 

(SUB 338 

ISLE 428 



AND TK1588 THEM 
fflHD TIi.3538 THEN 
fflHD TK4588 THEH 
e J f,HD TK5588 THEN 

lllrTlUS'nHD TU78B8 THEH 
''""'IfIhT.RHDJSB).! THEH 30SUB 
l SP&8U THEH T1=3:G8T0 28 



i IF TI> 

i if ti; 



Well, it would seem that caterpillars don't 
like mushrooms. So, in this game you must 
guide your caterpillar through the mush- 
room patch, avoiding the mushrooms, but 
picking up twigs, flowers, apples and 
acorns for bonus points as you work your 
way through the seasons. 

There are only two keys to master: "Z"— 
Left "M" — Right but you'll still find this 
game pretty tough. For such a short game, 
the graphics are excellent and will no 
doubt provide many tips for prospective 
game writers. 

"' : - : '-'t< tirt"L-~~.~.7'~-~—^ 

1", ?"«, 

4'o , THG0F F 

j SJ RETURN ' 

I 548 PEN C * 

"«g^lNT (RNC 
1 550 rnG ^.l.PRI 

; S ?"'-« 

J "3 TRGOFF 



244 



o OfiiCTOOP rori in if 
4— hi id i Khu ul 10 if 

'■ — ~¥* 



(*% 



=1HKEHD*1S) 
It [ISnTEIRrt.l 'PRINT CHWM9 
616 LOCATE 0W1, SPRINT CHR*<250 

620 TAG 
638 RETURN 

640 H-.=K>-+16 

IS IFTCSrKHSS.V*)* THEN SSpSX* 

5 sound i.ee,ie ;: ; . . 

- IF TEST'. FPi,v'-'. ..'=c THEN ■:>'. s- 

^W^-*. THEN ,,s-, 

giT^lfSi^' THEN SW*. 

2e . sound 1.50.10,.' 

7WS If TE5T.H-., ',':•..'=. THEN -.<.--■■< 
?? e 3 r?EST(Hi!v-.'.5 THEN ONTO 

■20 TflGOFF 

1 730 TAG 

;S»^".. 65 0.50.7.0 ; 0.. 
', , F S 5.>r>. THEN T::-S : . 
,,0 FOR 0=1 TO » »..' 
780 INK 0,0' INK 1,12' INK ^,4 in* 

7SB 9 «0DE 1 PEN 2 'BORDER 0' PAPER 
I WO LOCATE 14,1 'PRINT "CATERPILL 
me PEN 3 'LOCATE 4,4'PRINT "Gu.id 
tnl cte'HlUr through the 
020 PRINT " mushroom pitch. 



I 



j pr;,3 t *w 

I "»"ott9h the f 
S40 pr int „ W£' 



»rt< 



Q PRINT' 

'-' PEN 1 : I 

3 PRINT ' 






PRINT " 
„;- writs" blowers 

WO Print . 

Joints" aPPles 

■"* PRI„ T . 
^^'^ "SPRINT "„i 

■.v;;.i r.r- . T '-"-"'. i>U_f 

jja^^ffiiil <^ ™ E N 00,0 



J 27 



CUm I II llTlQINC BYERICTILLFY 

Diiuuluui iru ii * bYERiomLEY 




QTQOI 











CL' IL.U UO ! C BY MARK ELLIS 

\DCwC(\ Kit I D 





This original action game is a far cry from the Pie 
Piper. In this case you have to avoid the dashing 
rats, which come hurtling out of the blackness at 
you. Use the joystick to steer left and right, keeping 
clear of both the rats and the walls. 

When typing in the listing, you'll often find words 

within square brackets, indicating the keys you 

should press. This method eliminates ail those 

nasty-looking graphics characters. So: 

[HOME1 — Press the HOME key 

[RED] — Colour Red 

[s X] — Press key X whilst pressing SHIFT 

[c X] — Press key X whilst pressing C = . 






,,0'REM TITLE 

, READ SPRITE DATA 



: K3SE22KSS-...- 

□ REM *"* ,,. V r-"J32ia: p0KE, ' C + 2 



■70 S-*A9*Z SBT UP SOUND . .._ 

'0 PRINTT AB( o |«r« _, „ 

i0 KBXT:PoK EUC ' n „ SPCtl6 >' 

■0 PRINTCHRJUg, P ° KEVC *3°. 

FOSI = lTOB:t *(30) 

p "INTCHR»( ie) „ 

PRINT" „ "SPc 

3 NEXTI ' RBM B °?H 9 

3 MHICBBdio,,.,.,..,,, 



K ES-I. . NEXT I 
U:POKESl-6, ?a I 



— rom cu 
Loiioil 

[1?90 PRINTTAB112).. 
*8O0 PKI*rTA B(11) '„ 

I -5° R f" *** title paqe *.. 

•^] 1830 PRl NT .. fi a 'SEWbh*». 
IB60 PRlNTCHfi»f 1; .) *', 
"65 PRINTTAH ( 5)" S * (17) 

1866 PRI»TTAI,( 5 ,.. B * M-ELLIS" 

J I e T] [ C T , [o t te T] [ C T] . 

: ° prin ttab(5)«,,-„ , ■ ■ 

MO PRINT-POR ^SO WATCH OUT. -, 

'"0 PRINTTABroi..^ I17,C »R*(I?I 

3 550 OtTA.,",!! '.. PRE3S * «V TO ' .. 

«=»£?»■ 

' B ° DATAD n n J E ° (M "»> *** 
"0 DATASo.o o •* C -°-°-60.0.0 
100 DATAlS9.i 2 a 1 'fi ' °' 255p 0l 2 

l|°30 DATA°;°;o 6 ' ; ;3 6 -°-0.°a3ifo 

2060 DATAO £(ia R Q T f 1 IC R° 3 SBONES) 
2070 0ATA114 o', , ' 25Z -°'3.25U.O j 
2030 DArA3.2B a ' D , "* ,0 -3.eza.o 
2090 MTasso.o'j'^ 5 "'°-l.Uo,0 1 ; 

ilSO DATA6.3 □ j 2 136 -°-i.a.o 

"«" ~™ n.Tj'v '""- — 

150 DATAlfi.o Oii ■ 16 -°-0 

i6 ° DATA16 o'o'ifi i6 ' - 



1350 


REM ***MAIN LOOP 


>*. 






1370 






1380 
105O 


CY = CY-H6: IFC¥>E10 

P-PEEKf56320) 

IFP-123THENZ-1 

ONZGO3UB1530.1350 
PRINTCHRt{19)TAB< 


SI"" "L*SE 




IFPEEK(VC-31)AND1 


■1THEN1600 


1500 


GOTOl^O 1 ' " ^ 7 


,-30.0 








1530 


X-X-2:IFX<10THENX 


.10 


1550 




s-2119 


1560 
























ES-8 


K-.HEX-r 




1590 


REM «.« CRASH !NT 


3 KERB «• 


1610 


P0KEVC--2, X: POKEVC 






FORV- 1 5TO0 STE P - 1 : 




IMO 


POKE53270, INTtRND 


11' V 




POKEVC-37,INT<RNC 






POKEVC*3B.IHT(RND 
P0KEVO21, O 
PRINTCHR*(19);CY. 




1710 


POKE646.INT(BND(T 


C>*15> 


1730 


POKE53270.ZOO 




1700 


PRINTTAB(12)"YOU 


AVE BEEN" 


1760 


IFPEEK<56320)<>11 


?£:;::.,..„ 









•^ *#» - «Stf <w& 



IKULnrnLL 



i let n$="ooo" 

5 REM ROCK FALL February 85 
By A. CLAPHAM 
.10 DATA 2 5>5 . 170. 255. 35.255. 170 

. 255. 35 

20 DATA 7.12.27.26.12.7.1.95 
30 DATA 240.152.108,44,152.240 

. 192. 253 

40 DATA 112. 119. S7. 16, 31. 2. 5. 2 
50 DATA 7. 217, 245. 4. 252, 32. 80. 

32 

60 DATA 3, 1, 5. 11. 23-13. 15. 16 
70 DATA 0.224,32,160.220.226.2 

50. 122 

80 DATA 95.191.191.152.99.28.0 

90 DATA 250.237.5.237.122.191. 

92. 32 

100 DATA 1, 3. 5. 10. 18. 36. 68. 200 

110 DATA 0. 123. 64. 160, 144.72. 68 

. 34 

120 DATA 120. 39. 17. 9. 5. 3. 1. O 

130 DATA 28.136.16.32.64.128.0. 



140 DATA 6.9.11.22.57.127.221.1 

36 

150 DATA 192.32,160.208,28.252. 
222. 138 

151 DATA 3.6.7.6.3.1.65.37 

152 DATA 96.48.112.48,96.64.64. 
210 

153 DATA 19. 11. 11. 41. 41. 165. 165 
. 255 

154 DATA 228.232.232.200.200.20 
0,210.255 

155 DATA 255,238.238.68.68,68,0 



156 DATA O. 0, 68.68 



55 



233. 238. 



FOR 



'a" TO USR "u"-7: 
READ x: POKE n.x: NEXT n 
170 FLASH 0: OVER 0: INVERSE 0: 
BORDER 1: PAPER Li INK 7: BRIGH 
T l: CLS 
180 LET a$="1100010001101010101 

oioioioooiioonooioioioooioioioi 
ooioooiioioiooooooooooooooooooii 

10010010001000100010101000100011 

oomoioooioooioooioioiiioiii" 

190 LET p=l 



00 FOR n-1 TO 9: FOR m-1 TO 16 




10 IF a$(p)="i" THEN PRINT I 




6;AT n*2. (m-1 )*2: "FG": AT n*2- 


220 LET 


(m-l}*2: "HI" 


230 NEX 


15 IF INKEY$="s" THEN LET m=l 


240 FOR 


: LET n-200: NEXT m: NEXT n: G 


245 IF 


TO 400 


oo 



BY ANDREW CLAPHAM 



Infinite screens, and all different, should 
keep you glued to this Boulder Dash vari- 
ation. The idea ot the game is to collect five 
diamonds on each screen, whilst avoiding 
Egbert, the alien. Whenever you tunnel 
underneath a rock, the rock will fall, either 
stunning the alien for a bonus, or destroying 
a diamond (not advised!). Every five screens 
there will be no earth to tunnel through and 
on later screens the alien will speed up. 

When typing the listing, you'll come 
across underlined characters. These are in 
place of the user-defined graphics which are 
normally scattered through the listing and 
should be typed in GRAPHICS mode (the G 
cursor). So if you see the character F, enter 
graphics mode (CAPS SHIFT + '9'), then hit 
the character and then return to normal 
mode (CAPS SHIFT +'9' again). You may 
also come across a set of characters such as 
sh8. These refer to Spectrum symbol 
graphics (above the keys 1 to 8). Again in 
graphics mode, hold down the SHIFT key 
whilst pressing the number (in this case '8'). 
When the program has been run, a listing 
will show the graphics, shown in the 
diagram below. 




KEY*.-"s" THEN 



250 


PRINT 


AT 


T 1.1 


: INK 




260 


PRINT 


AT 


270 


PRINT 


AT 


AT 2J 
230 


BEEP 


LM" 
01. 


290 


LET a 


S = " 


A. CI 


aeham 


pre 






Guide 


Ernie th 


colle 


ct fi 




East 




mo 



'coprroi iff ic/UQis 
DrcLiKUl i io/ioh 



linns Egabert. CAN YOU BEAT 
THE HIGHSCORE OF "-^t.S-" ??? 

300 DIM k<fl>! LET o-il LET d-ll 
RESTORE 370: FOR n = l TO ft: READ 
k(n)i NEXT n: RESTORE 360: READ 
<3,z: IF INKEYJ=" 2 " THEN GO TO 



ftOO 



x = 0: FOR i 
=x-i: IF : 



LEW 



IF i 



LET ■ 



■5 THEN 
3U0 NEXT n: IF i 

TO 310 
350 GO TO 400 
360 DATA -59. 16, 

. 3. -59. 1. 7. a, II, 1 



<1000 THEN GO 



5. 3. -59. 1. 16. 2. 14. 2. 

. 11. 1, 9.3,7.2. 4,4, ft, I 
365 DATA 4. 4, 99, 99 
370 DATA -8,-1,0.-1 
390 DATA 99, 99 



ft 00 
410 ; 



c = l 



LS 

440 PRINT AT 10. 10: "SCREEN ";sc 

441 IF sc = l THEN PRINT AT 12.0 
■■ PAPER 7: INK Or" THE EA 
SY SCREEN 

142 IF ec-5 THEN PRINT AT 12.0 
J PAPER 7: INK 0:" Mind the V 
eiius Fly Traps " 

443 IF sc = ll THEN PRINT AT 12. 
0: INK 0: PAPER 7: "Watch out. you 



PRINT AT 12. 



=8 THEN LET 

THEN LET n=l 



320 IF INKEYJ="s 
000: GO TO 340 

330 PRINT AT 10. 0: INK x:s$( 
O n*31): BEEP .01. g: LET E-z- 
IF z=0 THEN READ q.zr IF z = 9 
HEN RESTORE 360; READ q.z 

335 BEEP .Ol.k(c): LET d-d + 1 
F d=3 THEN LET d = l: LET c = c + 



ftft4 IF sc-16 THEN 
0: PAPER 7; INK 0: " 

145 IF sc=18 THEN PRINT AT 12. 
0: PAPER 7; INK 0:"You must have 

skill to succeed! r" 

450 DEEP .2. ft: BEEP .2,0: BEEP 
- 2. ft; BEEP .4.7 

460 RANDOMIZE sc 

470 PAUSE 150: CLS : IF sc/501 
NT (sc/5) THEN LET w$="AA"-FN s 
•FN sS( 1 >-" AAAAAA 
-FN s$(6)-"AAAA 




\onr\s ecu i 
[KUU i n ILL 



BY ANDREW CLAPHAM 




500 IF m = 2 THEN PRINT AT x.y; 
INK 6:"FG";AT x-l.y; "HI" 

520 IF m-1 THEN PRINT AT x.y; 
PAPER li" ":AT x-l.y:" 

530 NEXT n: NEXT 111 

510 FOR n»l TO 5 

550 LET X=INT (RND*10i*2: LET y 
-INT (RND*l6)*2 

560 IF x = 10 THEN GO TO 550 

565 IF ATTR (x.yl-71 THEN GO T 
O 550 

570 PRINT AT x.y; INK 7: PAPER 
0; BRIGHT 1; "JK"; AT x-l.y; " LM" : 
NEXT n 

5SO LET h = 10: LET p = 0: LET oh-h 
: LET op = p: LET mh=10: LET mp-30 
: LET oinh=mh: LET offlp-mp 

590 LET md = l 

700 LET « = 0: LET alr=200- ( ac*2 5 
): IF air<60 THEN LET air»60 

710 GO SUB 1000 

720 GO SUB 2000 

730 DIM xll): DIM y(il): LET xll 
1 — 2: LET y{2}-Z: LET x(3)-2i LE 

34 



710 IF ac<ll OR sOlft THEN 
TO 770 

750 GO SUB 3000: GO SUB 2O00: G 
O SUB 3000: GO SUB 2000: GO SUB 
1000: GO SUB 1005 

760 GO TO 750 

770 IF sc<l6 OR sc>25 THEN GO 
TO 800 

780 FOR u=l TO 4: GO SUB 2000: 
GO SUB 3000: GO SUB 10O0: GO SUB 

1005: NEXT u 

790 GO SUB 9000: GO TO 780 

800 GO SUB 2000: GO SUB 3000: G 
O SUB 1000: GO SUB 1005 

810 GO TO 8 00 

1000 FBINT )0;AT l,0i"SCR ";s;TA 
B 10:"LVS ":1:TAB 16:"SCRN ":sc: 
TAB 21; "AIR " ; air; AT 0,0;" 

HIGHSCORE "=h« 

1001 RETURN 

1005 PRINT )0:AT l.il:s:AT l.2S:a 



1010 LET air=air-l: IF al: 
EN BEEP .1.30 
1020 IF air<=0 THEN FOR : 
15: BEEP .1.30: NEXT z: G< 



15 TH 



.op;" "; AT h,l 
+ 1, p: INK 1;"BJ 

; AT rati.mp: INK 
2010 LET oh=H: 
=mhi LET pmp=mi 
2020 RETURN 



5: "BC": AT I 



._*/ «_«- / Kui i iu/iun 



3000 LET nmd = nid-l: IF mud = 5 THEN 

LET nind = l 
3010 LET nnih = inh-y(nnid): LET nmp = 
rap-xlnrad) 
3020 IF nmli<0 OR nmh>20 OR nmp<0 

OR nmp>30 THEN GO TO 3500 
3030 IF SCREENS trimh. nmp ><>" " T 
HEN GO TO 3500 
30HO LET md-nmd: LET mp=nmp: LET 

nih = nmh: GO TO 3600 
3500 LET nmh«mh-y(md> : LET nmp=m 

3510 IF nmh<0 OR mnh>20 OB nmp<0 
OR nmp>30 THEN GO TO 3550 

3520 IF SCREENS (nmh.nrap)o" " T 

HEN GO TO 3550 

3530 LET mh=nmh: LET mp=nmp: GO 

TO 3600 

3550 LET md-tad-ll IF md = THEN 

LET md=4 

3600 IF ABS (orati-ohXIl AND ABS ( 

oap-opXt THEN GO SUB 850O: GO 

TO 6000 

3610 RETURN 

4000 LET nh=H-( [INKEY$-"a" )-( INK 

EYS="q" })*2: LET nP-P*(i INKEYJ=" 

m") -( INKEYS = "n"> )*2 

4010 IF nh<0 OR nh>21 OR np<0 OR 
np>31 THEN LET nh=oh: LET np-o 

4020 IF ATTR (nh,np)=78 THEN BE 
EP .01.12: LET nh=Oh! LET np-op 
4030 LET h = nh: LET p = np 
4040 IF ATTR (h,p)=71 THEN FOR 
n-1 TO 5: BEEP .01,n*5: NEXT a: 
LET fc-e+li LET s=s*5: IF s=5 THE 
N GO TO 8000 

4045 IF ATTR (h.pl=12 THEN FOR 
n=l TO 5 = BEEP .05.10: BEEP .05. 
: NEXT n : GO TO 6000 

4046 IF ATTR (fi.p)=35 THEN FOR 
n = 20 TO STEP -l! BEEP .001. n: 
NEXT n: GO TO 6000 

8050 IF oh<>0 AMD oh<>20 THEN I 
F ATTR (oh-l,op)=7a THEN GO SUB 
4500 



aiOO RETURN 






4&00 PRINT AT oh-2. 


op; ' 


":AT on 


-l.op; " ": FOR n-b 


TO 


IS STEP 2 


11510 PRINT AT ji. op: 




: AT n + X. 



p;" ":AT n*2, op: INK 6; "FG": AT 
n»3. op: INK 6; "HI" 
1520 BEEP . 01, (20-n>*2 

(1530 IF n-4=omh AND op=omp THEN 

FOR q = 69 TO STEP -5: BEEP .00 
5.q: NEXT q: FOR q=0 TO 69: BEEP 



.005.']: NEXT q: PRINT AT omh . om 
pi" "1 LET 3=3-100: LET rah-Oi L 
ET omh=0: LET mp=14: LET omp=l4 
451*0 IF n<>!3 THEN IF SCREENS ( 
n-4.0p)0" " THEN GO TO 1600 
"550 PRINT AT oh. op:" " : AT oh-1 
.op:" ":AT h.p; INK 5:"B£";AT (1 
*1, p: INK 4: "DE" 
4560 NEXT n: LET n = l8 
4600 PRINT AT n+2.op: INK 6: "FG" 
; AT n+3.op; INK 6; "HI" 
4610 IF n-2=oh THEN LET oh-h 
4620 RETURN 
6000 PRINT AT Oh.opi" ":AT oh-1 

AT h.p; INK 5;"sh2sh7"; 

"sh2sh7": FOR n-69 TO 
BEEP .01. n: NEXT n 

IF 1=0 THEN GO 



.0: BEEP 
.5.2: BEE 
P .25.0: 

BEEP 1.0 



BEE 



STEP ■ 
6010 LET 1=1- 
TO 7000 

6020 GO TO 430 
7000 BEEP .5.0: 
.25.0: BEEP .5.0 
P .25.1: BEEP . 5 
BEEP .5.0: SEEP 
7010 LET a$ = " GAME 
V E 8 
7020 FOR n = l TO LEN sS: PRI 

10. n-1: aS(n) : BEEP .005.60 
P .005.10: NEXT n 
7030 BEEP . 5, -48 

7035 IF s>VAL hi THEN LET hS=ST 
RS s 

70U0 PAUSE 200: GO TO 170 
8000 BEEP .2.12: BEEP .2.7: BEEP 

.2.9: BEEP .4.11: BEEP .1.9: BE 
EP . 3. 11: BEEP . 4. 12 
8010 FOR n-air TO STEP -3: LET 

s = s-3: BEEP .003.11/4: PRINT 10: 
AT 1.4;s;AT 1.2B:n:" ": NEXT n: 
LET sc-sc-1 
8020 GO TO 430 

8500 LET dy=omh*8-h*8: LET dx = om 
p*8-p*8: FOR i/ = 175-h*8 TO 175"h* 
8-8 STEP -2: PLOT p*8»8.y: DRAW 
dx,-dy: BEEP .01.RND*50: NEXT y: 

RETURN 
9000 LET x«INT IRND*16)*2: LET y 
-INT (RND*11)*2 

9010 IF ATTR (y,x)-71 OR (y-mh A 
ND x=mp) OR (y-h AND x=p) THEN 
RETURN 
9020 PRINT AT y.x: INK 5: PAPER 



"TT" : AT ; 



"UU" 



THE GREAT C&VG COVER-UI 



SPeCTRAN 



7 <*> ;-» - 
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